home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 November / EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso / earcd / program / gcc / libmat.lha / src / mconst4.cc < prev    next >
C/C++ Source or Header  |  1980-01-01  |  283b  |  18 lines
  1. //                MATRIX LIB
  2. //            TOMMY JOHANSSON 1995
  3.  
  4. #include "matrix.h"
  5. Matrix::Matrix(const Matrix& A)
  6. {
  7.     #ifdef DEBUG
  8.     puts("Initierar matris från en annan.");
  9.     #endif
  10.     int i,j;
  11.     koff=alloc(A.m+1,A.n+1);
  12.     m=A.m;
  13.     n=A.n;
  14.     for(i=1;i<=m;i++)
  15.         for(j=1;j<=n;j++)
  16.             koff[i][j]=A.koff[i][j];
  17. }
  18.